home *** CD-ROM | disk | FTP | other *** search
/ Know Your Common Bird Songs / Know Your Common Bird Songs.iso / images / scripts / htuaallt.tut < prev    next >
Encoding:
Text File  |  1994-11-15  |  18.7 KB  |  819 lines
  1. htuaall
  2. (Script new
  3.  
  4.     add: (ScriptStep new
  5.         jumpTo: #newstart;
  6.         yourself);
  7.  
  8.     add: (ScriptStep new
  9.         fullScreen: 'scripts\htua\bitmaps\bigopen.bmp';
  10.         delay: 1;
  11.         unZoom;
  12.         mousePointAt: 320 @ 240;
  13.         rightBlank;
  14.         leftBlank;
  15.         leftListOff;
  16.         rightListOff;
  17.         avOff;
  18.         hostOff;
  19.         featuresOff;
  20.         exploreMultipleAnswersOff;
  21.         challengeMultipleAnswersOff;
  22.         yourself);
  23.     add: (ScriptStep new
  24.         leftBitmap: 'scripts\htua\bitmaps\welhtua.bmp';
  25.         playSound: 'scripts\htua1\01.wav';
  26.         waitForMci;
  27.  
  28.         rightBitmap: 'scripts\htua\bitmaps\kboard3.bmp';
  29.         playSound: 'scripts\htua1\02.wav';
  30.         waitForMci;
  31.         yourself);
  32.     add: (ScriptStep new
  33.         mousePointAt: 24 @ 240;
  34.         playSound: 'scripts\htua1\03.wav';
  35.         waitForMci;
  36.         yourself);
  37.     add: (ScriptStep new
  38.         leftBitmap: 'scripts\htua\bitmaps\desktop.bmp';
  39.         moveTo: 24 @ 58;
  40.         playSound: 'scripts\htua1\04.wav';
  41.         delay: 6;
  42.         moveTo: 7 @ 59;
  43.         waitForMci;
  44.         yourself);
  45.     add: (ScriptStep new
  46.         mousePointAt: 320 @ 240;
  47.         leftBitmap: 'scripts\htua\bitmaps\leftwin.bmp';
  48.         rightBitmap: 'scripts\htua\bitmaps\rightwin.bmp';
  49.         playSound: 'scripts\htua1\05.wav';
  50.         waitForMci;
  51.         yourself);
  52.     add: (ScriptStep new
  53.         leftBitmapNoBlank: 'scripts\htua\bitmaps\listitem.bmp';
  54.         rightBitmapNoBlank: 'scripts\htua\bitmaps\listitem.bmp';
  55.         leftListOn;
  56.         rightListOn;
  57.         playSound: 'scripts\htua1\06.wav';
  58.         waitForMci;
  59.         yourself);
  60.     add: (ScriptStep new
  61.  
  62.         rightBlank;
  63.         leftBlank;
  64.         featuresOff;
  65.         playSound: 'scripts\htua1\07.wav';
  66.         moveTo: 299 @ 386;
  67.         delay: 1;
  68.         moveTo: 302 @ 462;
  69.         delay: 1;
  70.         moveTo: 301 @ 404;
  71.         waitForMci;
  72.         leftEntity: 'Tufted Titmouse' attribute: 'Photo' index: 1;
  73.         yourself);
  74.     add: (ScriptStep new
  75.         moveTo: 83 @ 362;
  76.         playSound: 'scripts\htua1\08.wav';
  77.         waitForMci;
  78.         rightEntity: 'Tufted Titmouse' attribute: 'Range' index: 1;
  79.         moveTo: 390 @ 362;
  80.         yourself);
  81.     add: (ScriptStep new
  82.         moveTo: 345 @ 330;
  83.         playSound: 'scripts\htua1\09.wav';
  84.         delay: 0.8;
  85.         moveTo: 343 @ 275;
  86.         delay: 0.8;
  87.         moveTo: 343 @ 220;
  88.         delay: 0.8;
  89.         moveTo: 343 @ 160;
  90.         delay: 0.8;
  91.         moveTo: 343 @ 114;
  92.         delay: 0.8;
  93.         moveTo: 343 @ 63;
  94.         delay: 0.8;
  95.         waitForMci;
  96.         yourself);
  97.     add: (ScriptStep new
  98.         playSound: 'scripts\htua1\10.wav';
  99.         moveTo: 343 @ 221;
  100.         delay: 1;
  101.         moveTo: 322 @ 221;
  102.         delay: 0.5;
  103.         waitForMci;
  104.         playSound: 'scripts\click8.wav';
  105.         leftAttribute: 'Range';
  106.         waitForMci;
  107.         yourself);
  108.  
  109.  
  110.     add: (ScriptStep new
  111.         playSound: 'scripts\htua1\11.wav';
  112.         waitForMci;
  113.         moveTo: 325 @ 233;
  114.         moveTo: 332 @ 227;
  115.         moveTo: 328 @ 219;
  116.         moveTo: 322 @ 212;
  117.         moveTo: 312 @ 220;
  118.         moveTo: 312 @ 229;
  119.         moveTo: 320 @ 233;
  120.         moveTo: 325 @ 233;
  121.         yourself);
  122.  
  123.     add: (ScriptStep new
  124.         playSound: 'scripts\htua1\12.wav';
  125.         delay: 3;
  126.         moveTo: 373 @ 115;
  127.         waitForMci;
  128.         playSound: 'scripts\click8.wav';
  129.         waitForMci;
  130.         rightAttribute: 'Photo';
  131.         waitForMci;
  132.         yourself);
  133.     add: (ScriptStep new
  134.         playSound: 'scripts\htua1\13.wav';
  135.         waitForMci;
  136.         moveTo: 345 @ 115;
  137.         playSound: 'scripts\click8.wav';
  138.         waitForMci;
  139.         attribute: 'Photo';
  140.         yourself);
  141.     add: (ScriptStep new
  142.         playSound: 'scripts\htua1\14.wav';
  143.         rightEntity: 'Marsh Wren' attribute: 'Photo' index: 1;
  144.         waitForMci;
  145.         rightEntity: 'Eastern Phoebe' attribute: 'Photo' index: 1;
  146.         delay: 2;
  147.         yourself);
  148.     add: (ScriptStep new
  149.         playSound: 'scripts\htua1\15.wav';
  150.         moveTo: 186 @ 339;
  151.         waitForMci;
  152.         yourself);
  153.     add: (ScriptStep new
  154.         playSound: 'scripts\htua1\16.wav';
  155.         moveTo: 132 @ 327;
  156.         waitForMci;
  157.         playSound: 'scripts\click8.wav';
  158.         leftIndex: 2;
  159.         waitForMci;
  160.         yourself);
  161.     add: (ScriptStep new
  162.         playSound: 'scripts\htua1\17.wav';
  163.         delay: 2;
  164.         moveTo: 186 @ 339;
  165.         waitForMci;
  166.         playSound: 'scripts\click8.wav';
  167.         waitForMci;
  168.         leftTextOn;
  169.         yourself);
  170.     add: (ScriptStep new
  171.         playSound: 'scripts\htua1\18.wav';
  172.         waitForMci;
  173.         moveTo: 214 @ 341;
  174.         playSound: 'scripts\click8.wav';
  175.         leftListOn;
  176.         waitForMci;
  177.         yourself);
  178.  
  179.     add: (ScriptStep new
  180.         playSound: 'scripts\htua1\19.wav';
  181.         delay: 2;
  182.         moveTo: 241 @ 340;
  183.         waitForMci;
  184.         playSound: 'scripts\click8.wav';
  185.         delay: 0.2;
  186.         waitForMci;
  187.         fullScreen: 'tuti\153931.bmp';
  188.         yourself);
  189.     add: (ScriptStep new
  190.         playSound: 'scripts\htua1\20.wav';
  191.         waitForMci;
  192.         playSound: 'scripts\click8.wav';
  193.         waitForMci;
  194.         unZoom;
  195.         delay: 2;
  196.         leftEntity: 'Tufted Titmouse' attribute: 'Photo' index: 2;
  197.         rightEntity: 'Eastern Phoebe' attribute: 'Photo' index: 1;
  198.         yourself);
  199.     add: (ScriptStep new
  200.         moveTo: 270 @ 339;
  201.         playSound: 'scripts\htua2\21.wav';
  202.         waitForMci;
  203.         playSound: 'scripts\click8.wav';
  204.         waitForMci;
  205.         leftZoom;
  206.         yourself);
  207.     add: (ScriptStep new
  208.         delay: 2;
  209.         playSound: 'scripts\htua2\22.wav';
  210.         waitForMci;
  211.         playSound: 'scripts\click8.wav';
  212.         waitForMci;
  213.         unZoom;
  214.         leftEntity: 'Tufted Titmouse' attribute: 'Photo' index: 2;
  215.         rightEntity: 'Eastern Phoebe' attribute: 'Photo' index: 1;
  216.  
  217.         yourself);
  218.  
  219.     add: (ScriptStep new
  220.         delay: 3;
  221.         moveTo: 298 @ 338;
  222.         delay: 1;
  223.         playSound: 'scripts\click8.wav';
  224.         delay: 0.2;
  225.         leftFeaturesOn;
  226.         waitForMci;
  227.         playSound: 'scripts\htua2\23.wav';
  228.         waitForMci;
  229.         playSound: 'scripts\click8.wav';
  230.         delay: 0.2;
  231.         leftFeaturesOff;
  232.         waitForMci;
  233.         delay: 2;
  234.         yourself);
  235.  
  236.     add: (ScriptStep new
  237.         moveTo: 347 @ 394;
  238.         playSound: 'scripts\htua2\24a.wav';
  239.         delay: 0.5;
  240.         moveTo: 364 @ 386;
  241.         moveTo: 361 @ 437;
  242.         moveTo: 331 @ 438;
  243.         moveTo: 331 @ 395;
  244.         moveTo: 347 @ 394;
  245.         waitForMci;
  246.         yourself);
  247.     add: (ScriptStep new
  248.         delay: 1;
  249.         moveTo: 332 @ 438;
  250.         playSound: 'scripts\htua2\25.wav';
  251.         delay: 1;
  252.         rightBitmap: 'scripts\htua\bitmaps\aandorv.bmp';
  253.         waitForMci;
  254.         yourself);
  255.  
  256.     add: (ScriptStep new
  257.         rightBitmapNoBlank: 'scripts\htua\bitmaps\aorv.bmp';
  258.         playSound: 'scripts\htua2\26.wav';
  259.         waitForMci;
  260.         moveTo: 81 @ 327;
  261.         leftEntity: 'Tufted Titmouse' attribute: 'Photo' index: 2;
  262.         yourself);
  263.     add: (ScriptStep new
  264.         leftAttribute: 'Song';
  265.         delay: 3;
  266.         waitForMci;
  267.         rightBitmapNoBlank: 'scripts\htua\bitmaps\aandv.bmp';
  268.         playSound: 'scripts\htua2\27.wav';
  269.         waitForMci;
  270.         moveTo: 332 @ 438;
  271.         playSound: 'scripts\click8.wav';
  272.         waitForMci;
  273.         avOn;
  274.         leftAttribute: 'Photo';
  275.         delay: 3;
  276.         stopMci;
  277.         playSound: 'scripts\click8.wav';
  278.         waitForMci;
  279.         avOff;
  280.         yourself);
  281.  
  282.     add: (ScriptStep new
  283.         rightEntity: 'Eastern Phoebe' attribute: 'Photo' index: 1;
  284.         delay: 0.5;
  285.         moveTo: 455 @ 327;
  286.         playSound: 'scripts\click8.wav';
  287.         waitForMci;
  288.         rightIndex: 2;
  289.         moveTo: 360 @ 439;
  290.         playSound: 'scripts\htua2\28.wav';
  291.         delay: 1.5;
  292.         moveTo: 373 @ 448;
  293.         moveTo: 375 @ 439;
  294.         moveTo: 370 @ 428;
  295.         moveTo: 356 @ 428;
  296.         moveTo: 348 @ 442;
  297.         moveTo: 359 @ 452;
  298.         moveTo: 360 @ 439;
  299.         waitForMci;
  300.         playSound: 'scripts\click8.wav';
  301.         waitForMci;
  302.         linkOn;
  303.         rightEntity: 'Tufted Titmouse';
  304.         yourself);
  305.     add: (ScriptStep new
  306.         playSound: 'scripts\htua2\29.wav';
  307.         moveTo: 132 @ 327;
  308.         waitForMci;
  309.         playSound: 'scripts\click8.wav';
  310.         waitForMci;
  311.         leftIndex: 1;
  312.         rightIndex: 1;
  313.         yourself);
  314.     add: (ScriptStep new
  315.         playSound: 'scripts\htua2\30.wav';
  316.         moveTo: 455 @ 326;
  317.         waitForMci;
  318.         playSound: 'scripts\click8.wav';
  319.         waitForMci;
  320.         rightIndex: 2;
  321.         yourself);
  322.     add: (ScriptStep new
  323.         playSound: 'scripts\htua2\31.wav';
  324.         waitForMci;
  325.         rightAttribute: 'Habitat';
  326.         yourself);
  327.  
  328.     add: (ScriptStep new
  329.         playSound: 'scripts\htua2\33.wav';
  330.         waitForMci;
  331.         leftEntity: 'Marsh Wren';
  332.  
  333.         yourself);
  334.     add: (ScriptStep new
  335.         playSound: 'scripts\htua2\34.wav';
  336.         waitForMci;
  337.         rightEntity: 'Eastern Phoebe';
  338.         linkOff;
  339.         yourself);
  340.     add: (ScriptStep new
  341.         leftBitmap: 'scripts\htua\bitmaps\challeng.bmp';
  342.         rightBitmap: 'scripts\htua\bitmaps\challeng.bmp';
  343.         yourself);
  344.     add: (ScriptStep new
  345.         playSound: 'scripts\htua2\35.wav';
  346.         waitForMci;
  347.         yourself);
  348.     add: (ScriptStep new
  349.         rightBitmap: 'scripts\htua\bitmaps\chmoder.bmp';
  350.         moveTo: 347 @ 394;
  351.         playSound: 'scripts\htua2\36.wav';
  352.         delay: 2;
  353.         leftBitmap: 'scripts\htua\bitmaps\chmodel.bmp';
  354.         rightListOff;
  355.         delay: 1;
  356.  
  357.         waitForMci;
  358.         yourself);
  359.  
  360.  
  361.     add: (ScriptStep new
  362.         rightBlank;
  363.         identifyMode: 'Mallard' attribute: 'Photo' index: 2;
  364.         hostOff;
  365.         delay: 2;
  366.         makeGuess: 'Red-tailed Hawk';
  367.         delay: 2;
  368.         playSound: 'scripts\htua2\37.wav';
  369.         moveTo: 388 @ 374;
  370.         waitForMci;
  371.         yourself);
  372.     add: (ScriptStep new
  373.         playSound: 'scripts\htua2\38.wav';
  374.         moveTo: 83 @ 362;
  375.         waitForMci;
  376.         yourself);
  377.     add: (ScriptStep new
  378.         leftTextEntry: 'Mallard';
  379.         leftTextCr;
  380.         "makeGuess: 'Mallard';"
  381.         playSound: 'scripts\htua2\39.wav';
  382.         delay: 2;
  383.         moveTo: 78 @ 340;
  384.         delay: 1;
  385.         moveTo: 106 @ 342;
  386.         moveTo: 99 @ 335;
  387.         moveTo: 83 @ 336;
  388.         moveTo: 69 @ 337;
  389.         moveTo: 55 @ 341;
  390.         moveTo: 54 @ 349;
  391.         moveTo: 69 @ 350;
  392.         waitForMci;
  393.         yourself);
  394.     add: (ScriptStep new
  395.         playSound: 'scripts\htua2\40.wav';
  396.         delay: 3;
  397.         rightBitmap: 'scripts\htua\bitmaps\host.bmp';
  398.         moveTo: 330 @ 417;
  399.         waitForMci;
  400.         playSound: 'scripts\click8.wav';
  401.         waitForMci;
  402.         hostOn;
  403.         rightBlank;
  404.         nextIdentify: 'California Quail' attribute: 'Photo';
  405.         delay: 2;
  406.         yourself);
  407.     add: (ScriptStep new
  408.         playSound: 'scripts\htua3\41.wav';
  409.         waitForMci;
  410.         makeGuess: 'Ring-billed Gull';
  411.         delay: 2;
  412.         yourself);
  413.     add: (ScriptStep new
  414.         playSound: 'scripts\htua3\42.wav';
  415.         delay: 3;
  416.         moveTo: 360 @ 417;
  417.         waitForMci;
  418.         playSound: 'scripts\click8.wav';
  419.         waitForMci;
  420.         enablePane: #answerButton;
  421.         clickOn: #answerButton;
  422.         moveTo: 83 @ 362;
  423.         delay: 6;
  424.         yourself);
  425.  
  426.  
  427.     add: (ScriptStep new
  428.         exploreMode;
  429.         attribute: 'Photo';
  430.         leftBlank;
  431.         rightBlank;
  432.  
  433.         yourself);
  434.     add: (ScriptStep new
  435.         leftBitmap: 'scripts\htua\bitmaps\subsetsa.bmp';
  436.         rightBitmap: 'scripts\htua\bitmaps\subsetsa.bmp';
  437.         playSound: 'scripts\htua3\43.wav';
  438.         delay: 2;
  439.         leftBitmapNoBlank: 'scripts\htua\bitmaps\subsetsb.bmp';
  440.         rightBitmapNoBlank: 'scripts\htua\bitmaps\subsetsb.bmp';
  441.         delay: 2;
  442.         leftBitmapNoBlank: 'scripts\htua\bitmaps\subsets.bmp';
  443.         rightBitmapNoBlank: 'scripts\htua\bitmaps\subsets.bmp';
  444.  
  445.         waitForMci;
  446.         yourself);
  447.     add: (ScriptStep new
  448.  
  449.         playSound: 'scripts\htua3\44.wav';
  450.         delay: 1;
  451.         rightBitmapNoBlank: 'scripts\htua\bitmaps\subset2b.bmp';
  452.         delay: 6;
  453.         leftBitmapNoBlank: 'scripts\htua\bitmaps\subset2a.bmp';
  454.         waitForMci;
  455.         yourself);
  456.     add: (ScriptStep new
  457.         playSound: 'scripts\htua3\45.wav';
  458.         delay: 1;
  459.         leftBitmapNoBlank: 'scripts\htua\bitmaps\subsets3.bmp';
  460.         delay: 2;
  461.         rightBitmapNoBlank: 'scripts\htua\bitmaps\subsets4.bmp';
  462.         delay: 3;
  463.         leftBitmapNoBlank: 'scripts\htua\bitmaps\subsets5.bmp';
  464.         waitForMci;
  465.         delay: 1;
  466.         rightBlank;
  467.         manualSubset: #('Eastern Phoebe');
  468.         yourself);
  469.     add: (ScriptStep new
  470.         playSound: 'scripts\htua3\46.wav';
  471.         waitForMci;
  472.         addToManualSubset: 'Ring-billed Gull';
  473.         yourself);
  474.     add: (ScriptStep new
  475.         playSound: 'scripts\htua3\47.wav';
  476.         waitForMci;
  477.         addToManualSubset: 'Marsh Wren';
  478.         delay: 1;
  479.         addToManualSubset: 'California Quail';
  480.         yourself);
  481.     add: (ScriptStep new
  482.         leftEntity: 'Eastern Phoebe' attribute: 'Photo' index: 1;
  483.         playSound: 'scripts\htua3\48.wav';
  484.         rightBitmap: 'scripts\htua\bitmaps\subsets6.bmp';
  485.         waitForMci;
  486.         yourself);
  487.     add: (ScriptStep new
  488.         rightBlank;
  489.         playSound: 'scripts\htua3\49.wav';
  490.         waitForMci;
  491.         delay: 2;
  492.         leftEntity: 'Marsh Wren' attribute: 'Photo' index: 1;
  493.         delay: 2;
  494.         leftAttribute: 'Habitat';
  495.         playSound: 'scripts\htua3\49b.wav';
  496.         waitForMci;
  497.         moveTo: 360 @ 439;
  498.         playSound: 'scripts\click8.wav';
  499.         waitForMci;
  500.         linkOn;
  501.         rightEntity: 'Marsh Wren' attribute: 'Photo' index: 1;
  502.         delay: 4;
  503.         leftEntity: 'Ring-billed Gull';
  504.         delay: 2;
  505.         leftEntity: 'California Quail';
  506.         yourself);
  507.     add: (ScriptStep new
  508.         playSound: 'scripts\htua3\50.wav';
  509.         waitForMci;
  510.         linkOff;
  511.         cancelSubset;
  512.         delay: 3;
  513.         yourself);
  514.  
  515.     add: (ScriptStep new
  516.         leftBitmap: 'scripts\htua\bitmaps\incre2.bmp';
  517.         rightBitmap: 'scripts\htua\bitmaps\incre9a.bmp';
  518.         playSound: 'scripts\htua3\51.wav';
  519.         delay: 0.5;
  520.         rightBitmapNoBlank: 'scripts\htua\bitmaps\incre8b.bmp';
  521.         delay: 0.5;
  522.         rightBitmapNoBlank: 'scripts\htua\bitmaps\incre8a.bmp';
  523.         delay: 0.5;
  524.         rightBitmapNoBlank: 'scripts\htua\bitmaps\incre9ad.bmp';
  525.         waitForMci;
  526.         yourself);
  527.     add: (ScriptStep new
  528.         delay: 2;
  529.         rightBitmap: 'scripts\htua\bitmaps\incre3.bmp';
  530.         moveTo: 426 @ 238;
  531.         playSound: 'scripts\htua3\52.wav';
  532.         waitForMci;
  533.  
  534.         yourself);
  535.     add: (ScriptStep new
  536.         leftBitmap: 'scripts\htua\bitmaps\incre3a.bmp';
  537.         delay: 4;
  538.         playSound: 'scripts\ding3.wav';
  539.         waitForMci;
  540.         autoSubset: #('Eastern Phoebe' 'Ring-billed Gull' 'Marsh Wren' 'Red-tailed Hawk' 'California Quail');
  541.         leftBitmap: 'scripts\htua\bitmaps\incre3c.bmp';
  542.         delay: 2;
  543.  
  544.         rightBitmapNoBlank: 'scripts\htua\bitmaps\incre4.bmp';
  545.         playSound: 'scripts\htua3\53.wav';
  546.         waitForMci;
  547.         yourself);
  548.     add: (ScriptStep new
  549.         leftBitmap: 'scripts\htua\bitmaps\challeng.bmp';
  550.         playSound: 'scripts\htua3\53a.wav';
  551.         waitForMci;
  552.         yourself);
  553.     add: (ScriptStep new
  554.         leftBlank;
  555.         rightBlank;
  556.         identifyMode: 'Eastern Phoebe' attribute: 'Photo' index: 1;
  557.         hostOn;
  558.         delay: 3;
  559.         makeGuess: 'Eastern Phoebe';
  560.         delay: 3;
  561.         leftBitmap: 'scripts\htua\bitmaps\replace.bmp';
  562.         delay: 3;
  563.         playSound: 'scripts\ding3.wav';
  564.         waitForMci;
  565.         replace: 'Eastern Phoebe' with: 'Mallard';
  566.         leftBitmap: 'scripts\htua\bitmaps\incre3b.bmp';
  567.         delay: 3;
  568.         nextIdentify: 'Ring-billed Gull';
  569.         delay: 2;
  570.         makeGuess: 'Ring-billed Gull';
  571.         delay: 3;
  572.         leftBitmap: 'scripts\htua\bitmaps\replace2.bmp';
  573.         delay: 3;
  574.         playSound: 'scripts\ding3.wav';
  575.         waitForMci;
  576.         replace: 'Ring-billed Gull' with: 'Varied Thrush';
  577.         leftBitmap: 'scripts\htua\bitmaps\incre91.bmp';
  578.         delay: 3;
  579.         yourself);
  580.  
  581.     add: (ScriptStep new
  582.         playSound: 'scripts\htua3\54.wav';
  583.         waitForMci;
  584.         cancelSubset;
  585.         yourself);
  586.     add: (ScriptStep new
  587.         leftBitmap: 'scripts\htua\bitmaps\incre9ad.bmp';
  588.         playSound: 'scripts\htua3\55.wav';
  589.         waitForMci;
  590.         yourself);
  591.  
  592.  
  593.     add: (ScriptStep new
  594.         rightBitmap: 'scripts\htua\bitmaps\subsets.bmp';
  595.         playSound: 'scripts\htua3\56.wav';
  596.         waitForMci;
  597.         yourself);
  598.     add: (ScriptStep new
  599.         rightBlank;
  600.         leftListOn;
  601.         leftBitmap: 'scripts\htua\bitmaps\smartlst.bmp';
  602.         playSound: 'scripts\htua3\57.wav';
  603.         delay: 6;
  604.         leftTextEntry: 'R';
  605.         waitForMci;
  606.         yourself);
  607.     add: (ScriptStep new
  608.         leftTextEntry: 'Ri';
  609.         delay: 2;
  610.         yourself);
  611.  
  612.     add: (ScriptStep new
  613.         playSound: 'scripts\htua3\59.wav';
  614.         waitForMci;
  615.         leftTextCr;
  616.         delay: 4;
  617.         yourself);
  618.  
  619.     label: #newstart;
  620.  
  621.     add: (ScriptStep new
  622.         leftBitmap: 'scripts\htua\bitmaps\multans1.bmp';
  623.         rightBitmap: 'scripts\htua\bitmaps\multans1.bmp';
  624.  
  625.         playSound: 'scripts\htua4\62.wav';
  626.         waitForMci;
  627.         yourself);
  628.     add: (ScriptStep new
  629.         leftListOn;
  630.         leftEntity: 'California Quail' attribute: 'Habitat' index: 2;
  631.         featuresOn;
  632.         exploreMultipleAnswersOn;
  633.         playSound: 'scripts\htua4\63.wav';
  634.         waitForMci;
  635.         yourself);
  636.     add: (ScriptStep new
  637.         delay: 2;
  638.         leftEntity: 'Ring-billed Gull';
  639.         playSound: 'scripts\htua4\64.wav';
  640.         waitForMci;
  641.         yourself);
  642.  
  643.     add: (ScriptStep new
  644.         moveTo: 146 @ 346;
  645.         playSound: 'scripts\htua4\65.wav';
  646.         waitForMci;
  647.         yourself);
  648.  
  649.     add: (ScriptStep new
  650.         moveTo: 347 @ 394;
  651.         leftBitmap: 'scripts\htua\bitmaps\challeng.bmp';
  652.         playSound: 'scripts\htua4\67.wav';
  653.         waitForMci;
  654.         rightBlank;
  655.         yourself);
  656.     add: (ScriptStep new
  657.         identifyMode: 'Eastern Phoebe' attribute: 'Habitat' index: 2;
  658.         hostOn;
  659.         challengeMultipleAnswersOn;
  660.         delay: 5;
  661.         moveTo: 146 @ 346;
  662.         playSound: 'scripts\htua4\68.wav';
  663.         waitForMci;
  664.         yourself);
  665.     add: (ScriptStep new
  666.         makeGuess: 'Red-tailed Hawk';
  667.         delay: 1;
  668.         makeGuess: 'Eastern Phoebe';
  669.         delay: 1;
  670.         moveTo: 146 @ 346;
  671.         playSound: 'scripts\htua4\69.wav';
  672.         waitForMci;
  673.  
  674.         makeGuess: 'Varied Thrush';
  675.         makeGuess: 'Barred Owl';
  676.         makeGuess: 'Tufted Titmouse';
  677.  
  678.         yourself);
  679.  
  680.     add: (ScriptStep new
  681.         exploreMultipleAnswersOff;
  682.         exploreMode;
  683.         challengeMultipleAnswersOff;
  684.         yourself);
  685.  
  686.     add: (ScriptStep new
  687.         leftListOn;
  688.         rightListOn;
  689.         rightBlank;
  690.         playSound: 'scripts\htua\bitmaps\clock.wav';
  691.         leftBitmap: 'scripts\htua\bitmaps\timer1.bmp';
  692.         delay: 1;
  693.         leftBitmapNoBlank: 'scripts\htua\bitmaps\timer2.bmp';
  694.         delay: 1;
  695.         leftBitmapNoBlank: 'scripts\htua\bitmaps\timer3.bmp';
  696.         delay: 1;        
  697.         waitForMci;
  698.         playSound: 'scripts\htua4\71.wav';
  699.         waitForMci;
  700.         yourself);
  701.     add: (ScriptStep new
  702.         leftBitmapNoBlank: 'scripts\htua\bitmaps\timer4.bmp';
  703.         delay: 2;
  704.         leftBitmapNoBlank: 'scripts\htua\bitmaps\timer5.bmp';
  705.         yourself);
  706.     add: (ScriptStep new
  707.         leftBitmapNoBlank: 'scripts\htua\bitmaps\timer6.bmp';
  708.         moveTo: 119 @ 230;
  709.         playSound: 'scripts\htua4\73.wav';
  710.         delay: 2;
  711.         leftBitmapNoBlank: 'scripts\htua\bitmaps\timer7.bmp';
  712.         moveTo: 228 @ 246;
  713.         waitForMci;
  714.         delay: 2;
  715.         moveTo: 175 @ 281;
  716.         yourself);
  717.     add: (ScriptStep new
  718.         delay: 2;
  719.         leftEntity: 'Eastern Phoebe' attribute: 'Photo' index: 1;
  720.         delay: 1.3;
  721.         leftBlank;
  722.         playSound: 'scripts\htua4\74.wav';
  723.         waitForMci;
  724.         yourself);
  725.     add: (ScriptStep new
  726.         moveTo: 249 @ 195;
  727.         playSound: 'scripts\htua4\75.wav';
  728.         waitForMci;
  729.         playSound: 'scripts\click8.wav';
  730.         waitForMci;
  731.         leftEntity: 'Eastern Phoebe' attribute: 'Photo' index: 1;
  732.  
  733.         delay: 1.3;
  734.         leftBlank;
  735.         yourself);
  736.     add: (ScriptStep new
  737.         playSound: 'scripts\htua4\76.wav';
  738.         waitForMci;
  739.         moveTo: 249 @ 195;
  740.         playSound: 'scripts\click8.wav';
  741.         waitForMci;
  742.         leftEntity: 'Eastern Phoebe' attribute: 'Photo' index: 1;
  743.     
  744.         delay: 1.3;
  745.         leftBlank;
  746.         leftEntity: 'Marsh Wren' attribute: 'Photo' index: 1;
  747.         delay: 1.3;
  748.         leftBlank;
  749.         yourself);
  750.     add: (ScriptStep new
  751.         playSound: 'scripts\htua4\77.wav';
  752.         leftBitmapNoBlank: 'scripts\htua\bitmaps\timer7.bmp';
  753.         delay: 2;
  754.         moveTo: 119 @ 253;
  755.         leftBitmapNoBlank: 'scripts\htua\bitmaps\timer6.bmp';
  756.         waitForMci;
  757.         delay: 2;
  758.         moveTo: 175 @ 281;
  759.         yourself);
  760.     add: (ScriptStep new
  761.         playSound: 'scripts\htua4\78.wav';
  762.         waitForMci;
  763.         yourself);
  764.  
  765.  
  766.     add: (ScriptStep new
  767.         rightBlank;
  768.         leftBitmap: 'scripts\htua\bitmaps\prefere2.bmp';
  769.         delay: 1;
  770.         rightVideo: 'scripts\htua\pref79.avi';
  771.         waitForMci;
  772.  
  773.         yourself);
  774.     add: (ScriptStep new
  775.         delay: 1;
  776.         rightVideo: 'scripts\htua\pref80.avi';
  777.         waitForMci;
  778.         delay: 1;
  779.         rightVideo: 'scripts\htua\pref80a.avi';
  780.         waitForMci;
  781.         yourself);
  782.  
  783.     add: (ScriptStep new
  784.         fullScreen: 'scripts\htua\bitmaps\prefexbg.bmp';
  785.         playSound: 'scripts\htua4\81.wav';
  786.         waitForMci;
  787.         yourself);
  788.     add: (ScriptStep new
  789.         playSound: 'scripts\htua4\82.wav';
  790.         waitForMci;
  791.         delay: 2;
  792.         unZoom;
  793.         leftBlank;
  794.         rightBlank;
  795.         mousePointAt: 320 @ 240;
  796.         yourself);
  797.  
  798.  
  799.  
  800.     add: (ScriptStep new
  801.         leftBitmap: 'scripts\htua\bitmaps\closing.bmp';
  802.         playSound: 'scripts\htua4\84.wav';
  803.         waitForMci;
  804.         delay: 2;
  805.         leftListOn;
  806.         rightListOn;
  807.         yourself);
  808.  
  809.  
  810.  
  811.  
  812.     add: (ScriptStep new
  813.         delay: 1;
  814.         playSound: 'scripts\ding2.wav';
  815.         waitForMci;
  816.  
  817.         yourself);
  818.     yourself)
  819.